home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The CICA Windows Explosion!
/
The CICA Windows Explosion! - Disc 2.iso
/
winsock
/
ircii2-6.zip
/
SCRIPTS\DMSG
< prev
next >
Wrap
Text File
|
1994-12-28
|
365b
|
18 lines
alias dmsg.fixup {
@ dmsg.tmp = index(, $0) + 1
if (dmsg.tmp > 0) {
@ function_return = mid(0 $dmsg.tmp $0) ## [=] ## dmsg.fixup($mid($dmsg.tmp -1 $0))
} {
@ function_return = [$0]
}
^assign -dmsg.tmp
}
alias dmsg {
@ dmsg.r = max_recursions
^set max_recursions 20
msg =$dmsg.fixup($0) $1-
^set max_recursions $dmsg.r
^assign -dmsg.r
}